IF PEEK (peekloc) = &HAF THEN IF PEEK (peekloc+1)= &H20 AND PEEK (peekloc+2)=ASC("}") AND PEEK (peekloc+3)+ASC("|") AND PEEK (peekloc+4)= ASC ("{") THEN rescue2
PRINT #1, CHR$ (PEEK (peekloc));
GOTO rescue1
rescue2:
FOR i =1 TO 4
PRINT #1,CHR$(&H0);
NEXT i
CLOSE #1
NAME "res" AS "Resurrected",filetype$(buttonpressed)